home *** CD-ROM | disk | FTP | other *** search
/ The X-Philes (2nd Revision) / The X-Philes Number 1 (1995).iso / xphiles / hp48hor2 / hamilton < prev    next >
Text File  |  1995-03-31  |  2KB  |  9 lines

  1. HPHP48-E *δ░ 
  2.      4 3)@ hffffAD    3 3)` gffff D    2 3)p      PD     3)        °    pz 3)        δ    py 3)        δ    px 3)        δ    z 3)        D    y 3)        D    x 3)        D   pzdot 3)        0   pydot 3)        0   pxdot 3)        0   zdot 3)            ydot 3)            xdot 3)            PPAR t*p        P         w)       e       2█ä  X'¢r                  aæ ä  Y+1 
  3.   H ,*█ä  pxb¢ò  H.   ç-*-°q H.  ç-*-°q H. █ç-*-° ä  yb¢ò  g« ä  z    á-*-°q +1 
  4.   LieDer  -àa#á4òæ  N 6òæ  NT6 ä  xy6â÷ H.@█GöFçb m. àDe#H.   g#~ï ä  ydotîq m. àDe#H.   g#~ï ä  zdotîq m. àDe#H.    g#~ï ä  pxdotîq m. àDe#H.    g#~ï ä  pydotîq m. àDe#H.   g#~ï ä  pzdotîq b5 c#+1δ   Lie4thOrder  -àa#H.`à VFT&W¡  ûAe#H.   g#îÑ» H.`à VFT&W¡  ûAe#H.  ) g#îáà ½ûq ½û ä  LieDer 
  5. r, T6 ä   3y6âb  üÑ» g«Ñ» H.`à VFT&W¡ T6 ä   4y6âb g« c#+1P   HamiltonStep  -àa#T6 ä  pzy6òì T6 ä  pyy6òì T6 ä  pxy6òì T6 ä  zy6òì T6 ä  yy6òì T6 ä  xy6òì H.   G^ H. █w H.   G^ H.  w H.  (c)G^ H.  w H.0      G^ H.   w H.0      G^ H.   w H.0     G^ H.  w 96²    à Uç  Ö ÆF÷æ  ææDù  6"3* üÑ1* üáy á4òæ  U 6 ä   H.  éb b¢Rδ  ûAe#H.  ) g#í  ä   î1/* ─q, T6 ä   3y6òì H.  éb  £Rδ T6 ä   4y6òì t*à           à           °  δâ1 #H.à█ Ö ÆF÷æ6EW '3* üÑ1* üáy  ûÑæ  U ~aAe#m. P g#í ò #s  k#φûA H. █ ä  yH.   ä  pxH.    ä  pz+1àï b5 c#+1█!  SetUpHamiltonian  -àa#b¢ò  ,*0             H.   ç-*-° ä  pyb¢ò  g« ä  pzb¢ò  g«áb +1p T6 ä  Hy6òì H. █De#H. █ g#~ïQ¡  (c)Ae#H.P  GöF g#í  ä  HT6 ä  yy6â÷  
  6. R  T6 ä  pydoty6òì H. █De#H.   g#~ïQ¡  (c)Ae#H.P GöF g#í  ä  HT6 ä  pxy6â÷  
  7. Be#H.@█GöF g#í  ä  HT6 ä  pyy6â÷  
  8. Be#H.@ GöF g#í  ä  HT6 ä  pzy6â÷  
  9. Be#H.@ GöF g#í Be#H. █ g#H.°à VFC ö$GV&Ge#H.    g#í Be#H.   g#H.°à VFC ö$GV&Ge#H.    g#í Be#H.   g#H.°à VFC ö$GV&Ge#H.  (c) g#í Be#H.    g#H.°à VFC ö$GV&Ge#H.0       g#í Be#H.    g#H.°à VFC ö$GV&Ge#H.0       g#í Be#H.   g#H.°à VFC ö$GV&Ge#H.0      g#í  c#+1